perm filename TST2[M11,LCS] blob
sn#407391 filedate 1979-01-03 generic text, type T, neo UTF8
SRT=12800;
INS 0 1; < INSTRUMENT 1
SIMP
OSC
;
OSC P4 FP3 B2 P5;<OPT P4 P3 B2 F2 ;
OUT B2 B1;END; < ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!
INS 0 8 ; <INST. 8
SMP
S
;
OSC P4 FP3 B2 P5;<OPT P4 P3 B2 F2 ;
OUT B2 B1;END; < ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!
<GEN 0 2 1 1 1; <SINE WAVE F1
SIN 1 1; <SINE WAVE F1
SIN 2 1 0 .4 0 .2 0 .1; <CLAR WAVE F2
PLAY; SIMP 0.000 .1 A 900 F1;
P2←.3; P5←F2; S .1,, EF*2; FINI;